/ HyperCard - Sales Tool & Demo / DemoCD(Hypercard).toast / Goes in Extensions Folder / Scripting Additions / Numerics / Numerics.rsrc / aete_0_numerics

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 00 00 00 00 00 00 01 | 13 53 79 73 74 65 6d 20 |........|.System |
|00000010| 4f 62 6a 65 63 74 20 53 | 75 69 74 65 3b 0d 43 6f |Object S|uite;.Co|
|00000020| 70 79 72 69 67 68 74 20 | a8 20 31 39 39 33 20 41 |pyright |. 1993 A|
|00000030| 70 70 6c 65 20 43 6f 6d | 70 75 74 65 72 2c 20 49 |pple Com|puter, I|
|00000040| 6e 63 2e 20 41 6c 6c 20 | 72 69 67 68 74 73 20 72 |nc. All |rights r|
|00000050| 65 73 65 72 76 65 64 2e | 73 79 73 6f 00 01 00 01 |eserved.|syso....|
|00000060| 00 02 05 72 6f 75 6e 64 | 18 52 6f 75 6e 64 20 6e |...round|.Round n|
|00000070| 75 6d 62 65 72 20 74 6f | 20 69 6e 74 65 67 65 72 |umber to| integer|
|00000080| 2e 00 73 79 73 6f 72 6f | 6e 64 6c 6f 6e 67 0d 72 |..sysoro|ndlong.r|
|00000090| 6f 75 6e 64 65 64 20 76 | 61 6c 75 65 00 00 65 78 |ounded v|alue..ex|
|000000a0| 74 65 0f 6e 75 6d 62 65 | 72 20 74 6f 20 72 6f 75 |te.numbe|r to rou|
|000000b0| 6e 64 a0 00 00 01 08 72 | 6f 75 6e 64 69 6e 67 00 |nd.....r|ounding.|
|000000c0| 64 69 72 65 6f 6c 69 65 | 3a 73 70 65 63 69 66 79 |direolie|:specify|
|000000d0| 20 72 6f 75 6e 64 69 6e | 67 20 64 69 72 65 63 74 | roundin|g direct|
|000000e0| 69 6f 6e 2c 20 64 65 66 | 61 75 6c 74 20 69 73 20 |ion, def|ault is |
|000000f0| 72 6f 75 6e 64 69 6e 67 | 20 74 6f 20 6e 65 61 72 |rounding| to near|
|00000100| 65 73 74 00 80 00 0d 72 | 61 6e 64 6f 6d 20 6e 75 |est....r|andom nu|
|00000110| 6d 62 65 72 19 47 65 6e | 65 72 61 74 65 20 61 20 |mber.Gen|erate a |
|00000120| 72 61 6e 64 6f 6d 20 6e | 75 6d 62 65 72 2e 73 79 |random n|umber.sy|
|00000130| 73 6f 72 61 6e 64 2a 2a | 2a 2a 16 72 61 6e 64 6f |sorand**|**.rando|
|00000140| 6d 20 6e 75 6d 62 65 72 | 20 72 65 74 75 72 6e 65 |m number| returne|
|00000150| 64 00 00 00 2a 2a 2a 2a | 89 20 6e 75 6d 62 65 72 |d...****|. number|
|00000160| 20 74 6f 20 72 61 6e 64 | 6f 6d 69 7a 65 20 28 49 | to rand|omize (I|
|00000170| 66 20 69 6e 63 6c 75 64 | 65 64 2c 20 72 61 6e 64 |f includ|ed, rand|
|00000180| 6f 6d 20 6e 75 6d 62 65 | 72 20 66 72 6f 6d 20 30 |om numbe|r from 0|
|00000190| 20 74 6f 20 74 68 69 73 | 20 76 61 6c 75 65 2e 20 | to this| value. |
|000001a0| 49 66 20 6e 6f 20 6e 75 | 6d 62 65 72 20 73 70 65 |If no nu|mber spe|
|000001b0| 63 69 66 69 65 64 2c 20 | 74 68 65 6e 20 61 20 76 |cified, |then a v|
|000001c0| 61 6c 75 65 20 62 65 74 | 77 65 65 6e 20 30 20 61 |alue bet|ween 0 a|
|000001d0| 6e 64 20 31 20 69 73 20 | 72 65 74 75 72 6e 65 64 |nd 1 is |returned|
|000001e0| 2e 29 a0 00 00 03 04 66 | 72 6f 6d 00 66 72 6f 6d |.).....f|rom.from|
|000001f0| 2a 2a 2a 2a 0a 66 72 6f | 6d 20 76 61 6c 75 65 00 |****.fro|m value.|
|00000200| 80 00 02 74 6f 00 74 6f | 20 20 2a 2a 2a 2a 08 74 |...to.to|  ****.t|
|00000210| 6f 20 76 61 6c 75 65 00 | 80 00 09 77 69 74 68 20 |o value.|...with |
|00000220| 73 65 65 64 73 65 65 64 | 2a 2a 2a 2a 00 00 80 00 |seedseed|****....|
|00000230| 00 00 00 00 00 01 6f 6c | 69 65 00 04 02 75 70 00 |......ol|ie...up.|
|00000240| 72 6e 64 55 08 72 6f 75 | 6e 64 20 75 70 00 04 64 |rndU.rou|nd up..d|
|00000250| 6f 77 6e 00 72 6e 64 44 | 0a 72 6f 75 6e 64 20 64 |own.rndD|.round d|
|00000260| 6f 77 6e 00 0b 74 6f 77 | 61 72 64 20 7a 65 72 6f |own..tow|ard zero|
|00000270| 72 6e 64 5a 11 72 6f 75 | 6e 64 20 74 6f 77 61 72 |rndZ.rou|nd towar|
|00000280| 64 20 7a 65 72 6f 0a 74 | 6f 20 6e 65 61 72 65 73 |d zero.t|o neares|
|00000290| 74 00 72 6e 64 4e 10 72 | 6f 75 6e 64 20 74 6f 20 |t.rndN.r|ound to |
|000002a0| 6e 65 61 72 65 73 74 00 |                         |nearest.|        |
+--------+-------------------------+-------------------------+--------+--------+